object Form1: TForm1
  Left = 601
  Top = 244
  Margins.Left = 5
  Margins.Top = 5
  Margins.Right = 5
  Margins.Bottom = 5
  Caption = 'IsoSurfaces'
  ClientHeight = 858
  ClientWidth = 1276
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -19
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsStayOnTop
  Position = poScreenCenter
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  PixelsPerInch = 168
  TextHeight = 24
  object Viewer: TGLSceneViewer
    Left = 270
    Top = 0
    Width = 1006
    Height = 858
    Margins.Left = 5
    Margins.Top = 5
    Margins.Right = 5
    Margins.Bottom = 5
    Camera = Camera
    Buffer.BackgroundColor = 10485760
    Buffer.ShadeModel = smSmooth
    FieldOfView = 90.013168334960940000
    PenAsTouch = False
    Align = alClient
    TabOrder = 0
  end
  object PanelLeft: TPanel
    Left = 0
    Top = 0
    Width = 270
    Height = 858
    Margins.Left = 5
    Margins.Top = 5
    Margins.Right = 5
    Margins.Bottom = 5
    Align = alLeft
    Caption = ' '
    TabOrder = 1
    object Label2: TLabel
      Left = 4
      Top = 301
      Width = 74
      Height = 24
      Margins.Left = 5
      Margins.Top = 5
      Margins.Right = 5
      Margins.Bottom = 5
      Caption = 'Iso value'
    end
    object rgSurface: TRadioGroup
      Left = 0
      Top = 697
      Width = 221
      Height = 99
      Margins.Left = 5
      Margins.Top = 5
      Margins.Right = 5
      Margins.Bottom = 5
      Caption = 'Surface type'
      ItemIndex = 0
      Items.Strings = (
        'GLFreeForm'
        'GLMesh')
      TabOrder = 0
      OnClick = rgSurfaceClick
    end
    object edIsoValue: TEdit
      Left = 19
      Top = 387
      Width = 107
      Height = 32
      Margins.Left = 5
      Margins.Top = 5
      Margins.Right = 5
      Margins.Bottom = 5
      TabOrder = 1
      Text = '0.3'
    end
    object bbRunMC: TBitBtn
      Left = 137
      Top = 387
      Width = 105
      Height = 33
      Margins.Left = 5
      Margins.Top = 5
      Margins.Right = 5
      Margins.Bottom = 5
      Caption = 'Run MC'
      TabOrder = 2
      OnClick = bbRunMCClick
    end
    object cbFillLines: TCheckBox
      Left = 7
      Top = 460
      Width = 119
      Height = 30
      Margins.Left = 5
      Margins.Top = 5
      Margins.Right = 5
      Margins.Bottom = 5
      Caption = 'Fill/Lines'
      TabOrder = 3
      OnClick = cbFillLinesClick
    end
    object rgScalarField: TRadioGroup
      Left = 1
      Top = 1
      Width = 268
      Height = 287
      Margins.Left = 5
      Margins.Top = 5
      Margins.Right = 5
      Margins.Bottom = 5
      Align = alTop
      Caption = 'Scalar Field'
      ItemIndex = 0
      Items.Strings = (
        'Sphere surface'
        'Minkowski space'
        'Klein Bottle'
        'Chmutov-surface-1'
        'Chmutov-surface-2'
        'Toroidal surface'
        'Double torus surface')
      TabOrder = 4
      OnClick = rgScalarFieldClick
    end
    object rgFaceCulling: TRadioGroup
      Left = 7
      Top = 536
      Width = 200
      Height = 126
      Margins.Left = 5
      Margins.Top = 5
      Margins.Right = 5
      Margins.Bottom = 5
      Caption = 'Face Culling'
      ItemIndex = 0
      Items.Strings = (
        'fcBufferDefault'
        'fcCull'
        'fcNoCull')
      TabOrder = 5
      OnClick = rgFaceCullingClick
    end
    object tbIsoValue: TTrackBar
      Left = 5
      Top = 334
      Width = 254
      Height = 53
      Margins.Left = 5
      Margins.Top = 5
      Margins.Right = 5
      Margins.Bottom = 5
      Max = 9
      Min = 1
      Frequency = 10
      Position = 5
      TabOrder = 6
      ThumbLength = 35
      OnChange = tbIsoValueChange
    end
  end
  object Scene: TGLScene
    Left = 328
    Top = 76
    object Camera: TGLCamera
      DepthOfView = 70.000000000000000000
      FocalLength = 428.901397705078100000
      TargetObject = dcWorld
      Position.Coordinates = {0000E0C0000080400000A0400000803F}
      object Light: TGLLightSource
        ConstAttenuation = 1.000000000000000000
        Position.Coordinates = {0000C8420000A0410000A0400000803F}
        SpotCutOff = 180.000000000000000000
      end
    end
    object dcWorld: TGLDummyCube
      Direction.Coordinates = {000000000000803F2EBD3BB300000000}
      PitchAngle = 90.000000000000000000
      ShowAxes = True
      Up.Coordinates = {000000002EBD3BB3000080BF00000000}
      CubeSize = 1.000000000000000000
      object meshSurf: TGLMesh
        Material.FrontProperties.Emission.Color = {C9C8483FC9C8C83EC9C8483E0000803F}
        Material.FaceCulling = fcNoCull
        Material.PolygonMode = pmLines
        Mode = mmTriangles
        VertexMode = vmVNC
      end
      object freeSurf: TGLFreeForm
        Material.FrontProperties.Emission.Color = {DAD9593F8B8A0A3FEDEC6C3E0000803F}
        Material.BlendingMode = bmTransparency
      end
    end
  end
  object SimpleNavigation: TGLSimpleNavigation
    Form = Owner
    GLSceneViewer = Viewer
    FormCaption = 'IsoSurfaces - %FPS'
    KeyCombinations = <
      item
        ShiftState = [ssLeft, ssRight]
        Action = snaZoom
      end
      item
        ShiftState = [ssLeft]
        Action = snaMoveAroundTarget
      end
      item
        ShiftState = [ssRight]
        Action = snaMoveAroundTarget
      end>
    Left = 486
    Top = 76
  end
end
